Adding doc link to doc.send

Notes/Domino 8 Forum

Subject: Adding doc link to doc.send

Feedback Type: Question

Product Area: Designer Client

Technical Area: Application development

Platform: ALL

Release: All

Reproducible: Not applicable

Hi, I need help adding to the the existing script, shown below, which would send an email that includes a doc link to the newly created document. The code is not mine, I really don't know script, I usually use @MailSend with [IncludeDoclink].

Thanks, Paul

-----------------------------------------------------------------------------

Sub Click(Source As Button)
'Create Socket from Config # 1
Dim session As New NotesSession
Dim db As NotesDatabase
Dim workspace As New NotesUIWorkspace
Dim collection As NotesDocumentCollection
Set db=session.CurrentDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set uidoc=workspace.CurrentDocument
Set doc=uidoc.Document
Dim newdoc As NotesDocument

Set collection = workspace.PickListCollection(1,False, "D01DBR06/01/A/IBM","s_dir\sockets1.nsf","9. Admin\Available Blank Forms\Sockets","Available Order Numbers","Please select an Order Number.")

Set newdoc = collection.GetFirstDocument

newdoc.Form = "AddSocket 3.0"

***???NEW SEND EMAIL CODE???***

Call newdoc.Save(True,True)
Call workspace.editDocument(False,newdoc)
Call workspace.EditDocument(True)
End If
End Sub

Feedback number WEBB9M4SJB created by ~Rebecca Opfoogen on 07/17/2014

Status: Open
Comments: